home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / edit / vim60rt.lha / Vim / vim60 / syntax / sqr.vim < prev    next >
Encoding:
Text File  |  2001-05-11  |  3.9 KB  |  104 lines

  1. " Vim syntax file
  2. "    Language: Structured Query Report Writer (SQR)
  3. "  Maintainer: Jeff Lanzarotta (frizbeefanatic@yahoo.com)
  4. "         URL: http://lanzarotta.tripod.com/vim/syntax/sqr.vim.zip
  5. " Last Change: April 30, 2001
  6.  
  7. " For version 5.x, clear all syntax items.
  8. " For version 6.x, quit when a syntax file was already loaded.
  9. if version < 600
  10.   syntax clear
  11. elseif exists("b:current_syntax")
  12.   finish
  13. endif
  14.  
  15. if version >= 600
  16.   setlocal iskeyword=@,48-57,_,-
  17. else
  18.   set iskeyword=@,48-57,_,-
  19. endif
  20.  
  21. syn case ignore
  22.  
  23. " The STP reserved words, defined as keywords.
  24. syn region    sqrIncluded    contained start=+"+ skip=+\\\\\|\\"+ end=+"+
  25. syn match      sqrIncluded    contained "<[^>]*>"
  26. syn match      sqrInclude    "^\s*#\s*include\>\s*["<]" contains=sqrIncluded
  27.  
  28. syn keyword    sqrDefine    #define #else #end-if #if #ifdef #ifndef
  29.  
  30. syn keyword    sqrOperator    not and or desc group having in any some all between exists
  31. syn keyword    sqrOperator    like from order to union intersect minus distinct use xor as
  32.  
  33. syn keyword    sqrStatement    array-add array-divide array-multiply array-subtract ask begin-document
  34. syn keyword    sqrStatement    begin-footing begin-heading begin-procedure begin-report begin-select
  35. syn keyword    sqrStatement    begin-setup begin-sql break close add
  36. syn keyword    sqrStatement    call commit concat connect create create-array date-time display divide
  37. syn keyword    sqrStatement    do edit else encode end-document end-evaluate end-footing end-heading
  38. syn keyword    sqrStatement    end-if end-procedure end-report end-select end-setup end-sql end-while
  39. syn keyword    sqrStatement    evaluate execute upper exit-select extract fill find get goto if input
  40. syn keyword    sqrStatement    into let isnull load-lookup lookup lower lowercase match move multiply
  41. syn keyword    sqrStatement    new-column new-page new-report next-listing no-formfeed nop on-break
  42. syn keyword    sqrStatement    on-error open page-number page-size position printer-init put read
  43. syn keyword    sqrStatement    rollback select set show stop string subtract unstring uppercase
  44. syn keyword    sqrStatement    use-column when when-other where while with wrap write noline output print
  45. syn keyword    sqrStatement    declare-layout end-declare declare-report loops
  46. syn keyword    sqrStatement    insert update delete values
  47.  
  48. syn keyword    sqrType        char varchar datetime smalldatetime float int smallint number money tinyint
  49.  
  50. " Numeric Functions.
  51. syn keyword    sqrFunction    abs acos asin atan ceil cos cosh def e10 exp floor log log10 mod
  52. syn keyword    sqrFunction    power rad round sign sin sinh sqrt tan tanh trunc
  53. syn keyword    sqrFunction    datepart datename
  54.  
  55. " Miscellaneous Functions.
  56. syn keyword    sqrFunction    ascii chr cond edit instr isnull length lower lpad ltrim nvl range rpad
  57. syn keyword    sqrFunction    rtrim substr to_char to_number translate upper
  58.  
  59. syn keyword    sqrParameter    quiet for-reading record status
  60.  
  61. syn keyword    sqrTodo        TODO FIXME XXX DEBUG NOTE
  62.  
  63. " Strings and characters:
  64. syn region    sqrString    start=+"+  skip=+\\\\|\\"+  end=+"+
  65. syn region    sqrString    start=+'+  skip=+\\\\|\\"+  end=+'+
  66.  
  67. " Numbers:
  68. syn match      sqrNumber    "-\=\<\d*\.\=[0-9_]\>"
  69.  
  70. " Comments:
  71. syn region    sqrComment    start="/\*"  end="\*/" contains=sqrTodo
  72. syn match      sqrComment    "!.*" contains=sqrTodo
  73. syn sync ccomment sqrComment
  74.  
  75. " Define the default highlighting.
  76. " For version 5.7 and earlier, only when not done already.
  77. " For version 5.8 and later, only when an item doesn;t have hightlighting yet.
  78. if version >= 508 || !exists("did_sqr_syn_inits")
  79.   if version < 508
  80.     let did_sqr_syn_inits = 1
  81.     command -nargs=+ HiLink hi link <args>
  82.   else
  83.     command -nargs=+ HiLink hi def link <args>
  84.   endif
  85.  
  86.   HiLink sqrComment Comment
  87.   HiLink sqrNumber Number
  88.   HiLink sqrOperator Operator
  89.   HiLink sqrStatement Statement
  90.   HiLink sqrString String
  91.   HiLink sqrType Type
  92.   HiLink sqrDefine Macro
  93.   HiLink sqrInclude Include
  94.   HiLink sqrTodo Todo
  95.   HiLink sqrFunction Function
  96.   HiLink sqrParameter Function
  97.  
  98.   delcommand HiLink
  99. endif
  100.  
  101. let b:current_syntax = "sqr"
  102.  
  103. " vim: ts=8 sw=2
  104.